architecture simple of comparator is
	quantity vin across p to m;
begin
	p1 : process
		constant vh : real := abs(hys)/2.0;
		constant vl : real := -abs(hys)/2.0;
	begin
		-- The comparator digital handler goes here
		wait on vin'above(vh), vin'above(vl);
	end process;
end architecture simple;